home *** CD-ROM | disk | FTP | other *** search
/ CD Fun House 1 / CD Fun House (Wayzata Technology).iso / •AdventureLand• / Adventures / SpaceEscape •••• / SpaceEscape ееее / card_16665.txt < prev    next >
Text File  |  1990-10-02  |  4KB  |  168 lines
  1. -- card: 16665 from stack: in
  2. -- bmap block id: 19675
  3. -- flags: 4000
  4. -- background id: 2669
  5. -- name: engine
  6. ----- HyperTalk script -----
  7. on opencard
  8.   put "You are in the engine room of the ship.  There are various "& "pieces of complicated machinery here, none of which you know the "& "function of, nor would you like to.  The exit is to the east." into field "info"
  9.   global cardhide
  10.   if cardhide is "yes" then show card field "cardhide"
  11.   else hide card field "cardhide"
  12.   pass opencard
  13. end opencard
  14.  
  15.  
  16.  
  17. -- part 1 (button)
  18. -- low flags: 00
  19. -- high flags: 0000
  20. -- rect: left=180 top=155 right=234 bottom=263
  21. -- title width / last selected line: 0
  22. -- icon id / first selected line: 0 / 0
  23. -- text alignment: 1
  24. -- font id: 0
  25. -- text size: 12
  26. -- style flags: 0
  27. -- line height: 16
  28. -- part name: box
  29. ----- HyperTalk script -----
  30. on mouseUp
  31.   global objectname
  32.   put "box-ish thing" into objectname
  33.   visual effect zoom open
  34.   go to card "box"
  35. end mouseUp
  36.  
  37.  
  38.  
  39. -- part 2 (button)
  40. -- low flags: 00
  41. -- high flags: 0000
  42. -- rect: left=279 top=207 right=219 bottom=291
  43. -- title width / last selected line: 0
  44. -- icon id / first selected line: 0 / 0
  45. -- text alignment: 1
  46. -- font id: 0
  47. -- text size: 12
  48. -- style flags: 0
  49. -- line height: 16
  50. -- part name: id card
  51. ----- HyperTalk script -----
  52. on mouseUp
  53.   global objectname
  54.   put "id card" into objectname
  55.   go to card "id card"
  56. end mouseUp
  57.  
  58.  
  59.  
  60. -- part 4 (button)
  61. -- low flags: 00
  62. -- high flags: 0000
  63. -- rect: left=207 top=121 right=143 bottom=314
  64. -- title width / last selected line: 0
  65. -- icon id / first selected line: 0 / 0
  66. -- text alignment: 1
  67. -- font id: 0
  68. -- text size: 12
  69. -- style flags: 0
  70. -- line height: 16
  71. -- part name: curved duct
  72. ----- HyperTalk script -----
  73. on mouseUp
  74.   global objectname
  75.   put "ducts" into objectname
  76.   visual effect zoom open
  77.   go to card "duct"
  78. end mouseUp
  79.  
  80.  
  81.  
  82. -- part 5 (button)
  83. -- low flags: 00
  84. -- high flags: 0000
  85. -- rect: left=365 top=150 right=233 bottom=460
  86. -- title width / last selected line: 0
  87. -- icon id / first selected line: 0 / 0
  88. -- text alignment: 1
  89. -- font id: 0
  90. -- text size: 12
  91. -- style flags: 0
  92. -- line height: 16
  93. -- part name: cylinder
  94. ----- HyperTalk script -----
  95. on mouseUp
  96.   global objectname
  97.   put "cylindrical thing" into objectname
  98.   visual effect zoom open
  99.   go to card "cylinder"
  100. end mouseUp
  101.  
  102.  
  103.  
  104. -- part 6 (field)
  105. -- low flags: 01
  106. -- high flags: 0001
  107. -- rect: left=275 top=204 right=222 bottom=294
  108. -- title width / last selected line: 0
  109. -- icon id / first selected line: 0 / 0
  110. -- text alignment: 0
  111. -- font id: 3
  112. -- text size: 12
  113. -- style flags: 0
  114. -- line height: 16
  115. -- part name: cardhide
  116.  
  117.  
  118. -- part 7 (button)
  119. -- low flags: 00
  120. -- high flags: 0000
  121. -- rect: left=290 top=55 right=143 bottom=314
  122. -- title width / last selected line: 0
  123. -- icon id / first selected line: 0 / 0
  124. -- text alignment: 1
  125. -- font id: 0
  126. -- text size: 12
  127. -- style flags: 0
  128. -- line height: 16
  129. -- part name: curved duct
  130. ----- HyperTalk script -----
  131. on mouseUp
  132.   global objectname
  133.   put "ducts" into objectname
  134.   visual effect zoom open
  135.   go to card "duct"
  136. end mouseUp
  137.  
  138.  
  139.  
  140. -- part 8 (button)
  141. -- low flags: 00
  142. -- high flags: 0000
  143. -- rect: left=327 top=55 right=225 bottom=352
  144. -- title width / last selected line: 0
  145. -- icon id / first selected line: 0 / 0
  146. -- text alignment: 1
  147. -- font id: 0
  148. -- text size: 12
  149. -- style flags: 0
  150. -- line height: 16
  151. -- part name: curved duct
  152. ----- HyperTalk script -----
  153. on mouseUp
  154.   global objectname
  155.   put "ducts" into objectname
  156.   visual effect zoom open
  157.   go to card "duct"
  158. end mouseUp
  159.  
  160.  
  161.  
  162. -- part contents for background part 18
  163. ----- text -----
  164. Engine Room
  165.  
  166. -- part contents for background part 6
  167. ----- text -----
  168. You are in the engine room of the ship.  There are various pieces of complicated machinery here, none of which you know the function of, nor would you like to.  The exit is to the east.